10 POKE53280,0:POKE53281,0
15 GOSUB 100
20 PRINT"[147]         "
30 SYS13344
40 PRINT"[147][144]LOAD"CHR$(34)"HEISSE LUFT"CHR$(34)",8":PRINT"RUN"
50 POKE198,3:POKE631,13:POKE632,13:POKE633,13:PRINT"";
60 END
100 FORI=832TO832+33:READA:POKEI,A:NEXT
110 DATA120,169,51,133,1,169,0,133,95,133,90,133,88,169,208,133,96,169,240
115 DATA133,89,169,224,133,91,32,191,163,169,55,133,1,88,96
120 SYS832:POKE850,160:SYS832
125 POKE56576,PEEK(56576)AND252
130 POKE53272,8
135 POKE648,192:POKE2,255
145 POKE53270,PEEK(53270)OR16
150 POKE53283,09:POKE53282,11
200 RETURN